home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Magnum One
/
Magnum One (Mid-American Digital) (Disc Manufacturing).iso
/
d12
/
asmbler.arc
/
IDISK.ASM
< prev
next >
Wrap
Assembly Source File
|
1988-11-19
|
671b
|
33 lines
ORG 0100H
code SEGMENT PUBLIC 'code'
ASSUME CS:code
PUSH DS
XOR AX,AX
PUSH AX
CALL IDISK
RET FAR
;
; IDISK (drive)
; int drive; /* 80h = c: 81h = d:
;
SECTOR DB 512 DUP (6CH)
IDISK PROC NEAR
PUSH CS
POP ES
MOV BX,OFFSET SECTOR ;Adr of sector buf
MOV AL,6 ;INTERLEAVE = 6
MOV AH,0 ;RESET
MOV CX,1 ;CYL = 0, SECTOR = 1
MOV DX,080H ;Drive #
INT 13H ;RESET DISK
MOV AX,0F01H ;LOAD BUFFER
INT 13H
MOV AX,701H ;FORMAT
INT 13H
RET ;RETURN TO DOS
IDISK ENDP
code ENDS
END